Top 10k strings from Premier League (1985)(E&J Software).z80
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [Z80] /
Back to the directory listing
13 COUNT=COUNT+1 6 )+B(TEAM,N,1 5 )=E(TEAM,5 4 )+B(TEAM,N,2 3 S(TEAM,COUNT)=V 3 B(TEAM,N,1 3 )=E(TEAM,3 3 )=E(TEAM,1 2 POST=POST+1 2 PLAYER=PLAYER+ 2 MONEY=MONEY+TEST: 2 LOAN=LOAN+ 2 D$(PLAYER,1 2 C$(TEAM,PLAYER)="M" 2 C$(TEAM,PLAYER)="A" 2 C$(TEAM,N)="M" 2 C$(TEAM,N)="D" 2 C$(TEAM,N)="A" 2 BGOAL=BGOAL+B(TEAM,N,3 2 B(T(F),PLAYER,3 2 B(F,TEAM+N,2 2 ;"YOU HAVE BEEN SACKED": 2 ;"WEEKLY BAL. `:";BAL 2 ;"Enter new name": 2 ;"3) Return to main menu": 2 ,G)=PLAYER 2 )=E(TEAM,7 2 )=E(TEAM,2 2 )=E(T(N),7 2 )=E(T(F),8 2 )=B(T(F),PLAYER,3 2 )=B(F,TEAM+N,2 2 )=A(T(F),7 2 );" ";B(1 2 )-A(TEAM,6 2 )+E(T(F),8 2 )+(E(TEAM,2 2 (B(T(F),S,1 1 Z$=C$(TEAM,PLAYER) 1 You owe the Bank `";LOAN: 1 WG=ABILITY*500 1 WEEK=WEEK+1 1 TEST>GDICE 1 TEST=TEST+ 1 TEST=25000 1 TEST<25000 1 TEAM=TEAM+1 1 TEAM=BTEAM 1 SQUAD=SQUAD+1 1 SHILTON STEVENS PEARCE ADAMS 1 SHEFF.WED.J 1 SEASON=SEASON+1 1 S(TEAM,N)=17 1 POINTS=A(TEAM,7 1 POINTS=A(F,7 1 POINTS<A(F,7 1 P>(FEE*.95 1 N=S(TEAM,N) 1 MONEY=MONEY-Z: 1 MONEY=MONEY-P: 1 MONEY=MONEY+Z: 1 MONEY=MONEY+TEST 1 MONEY=MONEY+FEE: 1 MONEY=750000 1 MONEY+TEST<0 1 MCOUNT>STYLE 1 MCOUNT=MCOUNT+1 1 LOAN=LOAN-Z: 1 LOAN=LOAN+Z: 1 J$="Q.P.R." 1 GOOD=GOOD-1 1 GOOD=GOOD+1 1 GAMES=GAMES+8 1 G$="SHEFF.WED.": 1 FORM=FORM+B(A,N,2 1 FEE=(B(TEAM,PLAYER,1 1 Enter squad No. or (M) for menu 1 E(BTEAM,G)=E(9 1 DICE=DICE+SKILL: 1 D$(S,T(F)) 1 CTTEAM=CTTEAM+1 1 CHAMP=CHAMP+1 1 C$(TEAM,V)="M" 1 C$(TEAM,V)="D" 1 C$(TEAM,V)="A" 1 C$(TEAM,S)=Z$ 1 C$(TEAM,PLAYER)=" ": 1 C$(TEAM,PLAYER)=" " 1 C$(TEAM,N)=C$(1 1 C$(TEAM,N)=" " 1 C$(T(F),S)="M" 1 C$(T(F),S)="A" 1 BTEAM=TEAM 1 BGOAL>(AGOAL*1.5 1 BAL=BAL-TEST: 1 B(TEAM,PLAYER,N)=0 1 B(TEAM,N,F)=B(1 1 B(F,TEAM,1 1 B(F,TEAM+2 1 AGOAL>(BGOAL*1.5 1 AGOAL=AGOAL+B(1 1 ABILITY=ABILITY+B(A,N,1 1 ABILITY=ABILITY+B(1 1 ;n;") ";A$(n): 1 ;n;" ";A$(n): 1 ;C$(TEAM,PLAYER);" A-";B(TEAM,PLAYER,1 1 ;C$(TEAM,N): 1 ;C$(A,N);" ";B(A,N,1 1 ;B(TEAM,N,1 1 ;B$(N);" ";C$(1 1 ;A$(TEAM);" OFFER `";FEE 1 ;A$(TEAM);" ";"PLAYER No. ";PLAYER 1 ;A$(T(D));" ";E(T(D),8 1 ;A$(T(D));" ";E(T(D),8 1 ;A$(A);" ";ABILITY;" ";FORM: 1 ;"YOU HAVE BEEN SACKED": 1 ;"WEEK - ";WEEK;" ": 1 ;"WAGES/EXP. `:";TEST 1 ;"THIS WEEK": 1 ;"RECEIPTS `:";TEST: 1 ;"Player to replace or R to return" 1 ;"Player affected"; 1 ;"PREMIER LEAGUE" 1 ;"PLEASE WAIT": 1 ;"NO MORE SELLING THIS WEEK": 1 ;"NO MORE PLAYERS ON OFFER": 1 ;"NO MORE DEALS THIS WEEK": 1 ;"INTEREST `:"; 1 ;"Estimated value ";B(TEAM,PLAYER,1 1 ;"Enter your offer" 1 ;"ENTER MANAGERS NAME": 1 ;"Due to your lack of success": 1 ;"Do you accept ?": 1 ;"CURRENT BALANCE `";MONEY: 1 ;"ATTENDANCE :";TEST 1 ;"AMOUNT OWED 1 ;"4) Return to main menu": 1 ;"3) Save game ": 1 ;"3) Return to main menu" 1 ;"2) Sell a player": 1 ;"2) Pay off loan": 1 ;"2) League Table ": 1 ;"2) Change team name": 1 ;"1) Take out loan": 1 ;"1) List fixtures": 1 ;"1) Change player name": 1 ;"1) Buy a player": 1 ;"- Offer ";N: 1 ;"(D)efence,(M)idfield,(A)ttack": 1 ;"(";E(T(2 1 ;"(";E(T(1 1 ;" You finished 8th in league": 1 ;" YOU DO NOT HAVE ENOUGH MONEY IN YOU ACCOUNT - GET A LOAN ! ": 1 ;" TRANSFER MARKET - BUY A PLAYER ";" Enter Team & Player number 1 ;" Score after 70 minutes 1 ;" Score after 25 minutes 1 ;" SUBSTITUTE - ";B$(Z);" ";B(1 1 ;" SORRY THIS PLAYER UNAVAILABLE ": 1 ;" SKILL LEVEL - ";SKILL;" 1 ;" Press (M) to return to menu ": 1 ;" PRESS (M) TO RETURN TO MENU ": 1 ;" PRESS (M) TO RETURN TO MENU " 1 ;" PLAYER INJURED DURING MATCH ": 1 ;" PLAYER INJURED - NOT AVAILABLE "; 1 ;" OFFER NOT ACCEPTED ": 1 ;" KICK OFF 1 ;" Half time 1 ;" FULL TIME 1 ;" Enter team number of substitute"; 1 ;" ENTER (P)RINT OR (C)ONTINUE " 1 ;" DO YOU WISH TO USE YOUR SUB ": 1 ;" DO YOU HAVE A PRINTER CONNECTED ": 1 ;" 6) Financial/Save game" 1 ;" 5) Transfer market" 1 ;" 4) Prepare/play next fixture" 1 ;" 3) Print squad details" 1 ;" 2) Print league/fixtures" 1 ;" 1) Change player/team name" 1 ;" ";D$(N,1 1 ;" ";B$(N);" 1 ;" press R - return or S - save" 1 ;" POOR SESSION - PLAYER GETS 1 ;" P R E M I E R L E A G U E ": 1 ;" MAX 12 LETTERS": 1 ;" GOOD SESSION SOME IMPROVEMENT ": 1 ;" BAD SESSION - PLAYER INJURED " 1 ;" ";B$(N): 1 ;" VERY GOOD SESSION ABILITY 1 ;" Team style 4 - 4 - 2 1 ;" Team style 4 - 3 - 3 1 ;" Team strengths:- 1 ;" PLAYER TYPE A F G No.": 1 ;" Number in team = ";CTTEAM;" ": 1 ;" HOME TEAM 1 ;" GOALS ": 1 ;" FORM ": 1 ;" ENTER SKILL LEVEL REQUIRED ": 1 ;" E N D O F S E A S O N ": 1 ;" THIS PLAYER NOT AVAILABLE ": 1 ;" SPECIAL TRAINING SESSION " 1 ;" PLAYER NOT TRANSFERRED 1 ,N)=C$(TEAM,PLAYER): 1 ,N);" ";B(1 1 ,G)=E(TEAM,G): 1 *** PREMIER LEAGUE *** 1 *** PICK SUB *** 1 )>(E(T(N+1 1 )>(E(T(N),5 1 )=B(TEAM,PLAYER,3 1 )=B(TEAM,PLAYER,2 1 )=B(TEAM,PLAYER,1 1 )=A(T(F),6 1 )=A(T(F),5 1 )=A(T(F),4 1 )=A(T(F),3 1 )=A(T(F),2 1 )=A(T(F),1 1 )="WEST HAM" 1 )="WATSON": 1 )="WADDLE": 1 )="STEVENS": 1 )="SHILTON": 1 )="ROBSON": 1 )="PEARCE": 1 )="NOTTS FOREST": 1 )="MAN.UTD.": 1 )="MABBUTT": 1 )="LIVERPOOL": 1 )="LINEKER": 1 )="HODDLE": 1 )="EVERTON": 1 )="COTTEE" 1 )="BUTCHER" 1 )="BEARDSLEY": 1 )="BARNES": 1 )="ASTON VILLA" 1 )="ARSENAL": 1 )="ADAMS": 1 );"Manager ";X$ 1 );" ";A$(N): 1 );" ";C$(1 1 );" ";B(A,N,2 1 );" G-";B(TEAM,PLAYER,3 1 );" F-";B(TEAM,PLAYER,2 1 )-(E(T(N+1 1 )-(E(T(N),1 1 )+(B(TEAM,PLAYER,3 1 )+(B(TEAM,PLAYER,2 1 (TEST+MONEY) 1 (TEST*2.15 1 (((E(T(N+1 1 (((E(T(N),3 1 $(F,N)="D": 1 "ENTER AMOUNT TO PAY `"; 1 "ENTER AMOUNT REQUIRED `"; 1 YOUR SQUAD IS TO SMALL 1 YOU HAVE WON 1 YOU HAVE A FULL SQUAD 1 WELL DONE ! 1 WADDLE BARNES LINEKER BEARDSLEY COTTEE 1 Training Report 1 THE PREMIER CHAMPIONSHIP 1 Select option and press enter 1 SLIGHT KNOCK 1 SEASON - ";SEASON: 1 SEASON TICKET SALES 1 Press enter to continue 1 PLEASE WAIT 1 PLAYER TRANSFERRED 1 PLAYER SOLD 1 P W D L F A PT": 1 OTHER RESULTS 1 MUCH IMPROVED 1 MAN.UTD. WEST HAM LIVERPOOL NOTTS FORESTEVERTON 1 HOME TEAM 1 HALF TIMES SCORES 1 From E & J SOFTWARE": 1 FROM 1 TO 5 1 FINAL TEAM 1 Enter(D)rop or (P)ick a player 1 Enter squad No. to play 1 Enter squad No. to drop 1 Enter option required 1 Enter Y or N to continue 1 CHAMPIONSHIP WINS - ";CHAMP;" 1 BUTCHER WATSON MABBUTT ROBSON HODDLE HODGE 1 AVERAGE SESSION 1 ASTON VILLA 1 midfield 1 defence 1 attack 1 No individual affected 1 FINAL OFFER DO YOU ACCEPT ?